/*
 * Copyright (c) 2013-2019 Huawei Technologies Co., Ltd. All rights reserved.
 * Copyright (c) 2020-2021 Huawei Device Co., Ltd. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without modification,
 * are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright notice, this list of
 * conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright notice, this list
 * of conditions and the following disclaimer in the documentation and/or other materials
 * provided with the distribution.
 *
 * 3. Neither the name of the copyright holder nor the names of its contributors may be used
 * to endorse or promote products derived from this software without specific prior written
 * permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
#include "It_posix_container.h"
#include <sched.h>
#include <unistd.h>
#include <sys/stat.h>
#include <limits.h>
#include <string>
#include <iostream>
#include <regex>

#define _GNU_SOURCE
#include <fcntl.h>
#include <stdlib.h>
#include <stdio.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <signal.h>
#define STACK_SIZE     (1024 * 1024)


static int childFun(void *p)
{
    pid_t pid = getpid();
    sleep(2);
    return 3;
}

static UINT32 Testcase1(VOID)
{
    pid_t callerPid;
    int childPid;
    void *pstk;
    int fd;
    int ret;
    int status;
    int setFlag;
    char targetpath[100];
    char  old_uts_link[100];
    char  new_uts_link[100];
    char  *containerType = "uts";

    callerPid = getpid();
    pstk = malloc(STACK_SIZE);
    ICUNIT_ASSERT_NOT_EQUAL(pstk, NULL, pstk);

    childPid = clone(childFun, (char *)pstk + STACK_SIZE, CLONE_NEWUTS | SIGCHLD, NULL);
    ICUNIT_ASSERT_NOT_EQUAL(childPid, -1, childPid);

    auto linkBuffer = readlink_container(callerPid, containerType);
    ICUNIT_ASSERT_NOT_EQUAL(linkBuffer.c_str(), NULL, linkBuffer.c_str());
    sprintf(old_uts_link, "%s", linkBuffer.c_str());

    sprintf(targetpath, "/proc/%d/container/uts", childPid);
    fd = open(targetpath, O_RDONLY | O_CLOEXEC);
    ICUNIT_ASSERT_NOT_EQUAL(fd, -1, fd);

    printf("before setns, link=%s\n", old_uts_link);
    setFlag = CLONE_NEWUTS;
    ret = setns(fd, setFlag);
    ICUNIT_ASSERT_NOT_EQUAL(ret, -1, ret);

    /* NOTE: close fd, otherwise test fail */
    ret = close(fd);
    ICUNIT_ASSERT_NOT_EQUAL(ret, -1, ret);

    linkBuffer = readlink_container(callerPid, containerType);

    sprintf(new_uts_link, "%s", linkBuffer.c_str());
    int strsize = strlen(new_uts_link);

    printf("after setns, expect to change link, actual(old,new):(%s,%s)\n", old_uts_link, new_uts_link);
    ICUNIT_ASSERT_SIZE_STRING_NOT_EQUAL(old_uts_link, new_uts_link, strsize, errno);

    ret = waitpid(childPid, &status, 0);
    ICUNIT_ASSERT_EQUAL(ret, childPid, ret);

    int exitCode = WEXITSTATUS(status);
    ICUNIT_ASSERT_EQUAL(exitCode, 3, exitCode);
    return 0;
}


static UINT32 Testcase2(VOID)
{
    int fd;
    int setFlag;
    int ret;

    fd = -1;
    setFlag = CLONE_NEWUTS;
    ret = setns(fd, setFlag);

    printf("setns with fd=-1,ret=%d\n", ret);
    ICUNIT_ASSERT_EQUAL(ret, -1, ret);
    return 0;
}


VOID ItPosixContainer003(void)
{
    TEST_ADD_CASE("IT_POSIX_CONTAINER_003 case1:normal case", Testcase1, TEST_POSIX, TEST_CONTAINER, TEST_LEVEL0, TEST_FUNCTION);
    TEST_ADD_CASE("IT_POSIX_CONTAINER_003 case2:abnormal case", Testcase2, TEST_POSIX, TEST_CONTAINER, TEST_LEVEL0, TEST_FUNCTION);
}
